program ExpressionsEtCodeTest;
 const
   a = 3;
   b = 4 + 5;
   c = 6 * 7;
   d = (8 + 2)/ 2;
   f = a;
   g = b;
   h = nil;
   i = TRUE;
   j = False;
   k = 'bonjour';
   l = 'a';
   m = 3.6;
   n = 1.4;
   o = m + n;
   p = o * 1.5;
   q = i and j;
   r = i or j;
   s = not i;
var x : integer;
y : integer;
z : real;
begin
  x := 1;
  y := 52;
  z := 0.5 * 32;
end.